cliff hanger pour Sharp PC1500 ( pas de programme )
tir du magazine Hebdogiciel N35

	Ncessite l'extension PETOOLS.

	Vous tes Cliff Hanger, gentleman-cambrioleur au grand coeur, et vous allez devoir faire face  plusieurs situations o vos rflexes seront mis  rude preuve : les v-nements, les situatinos vous sont dcrites textuellement  lcran monoligne de votre 1500.

Mode d'emploi :
	Au cours des affichages, dans certains cas, vous avez  effectuer :
- une action des pieds ou des mains,  ce moment-l s'affiche le mot "ACTION", et vous avez un laps de temps ( trs court, ne vous inquitez pas! ) pour appuyer "P" ou "M" ( pieds ou mains ) pour agir
- un changement de direction : haut ( touche "R"), bas ( touche "C" ), gauche ( touche "S" ), droite ( touche "G" )
	Dans ce cas s'affichera le mot "MANIP".
	A chaque changement de tableau, s'affiche le temps intermdiaire;si vous vous plantez, vous avez une explication sur ce que vous auriez du faire.

Programme :
1 ARUN:WAIT 50:PRINT "1er tableau:":PRINT "hey cliff !":PRINT "shhtt ! il y a un garde !":PRINT "ooh"
2 FOR I=1 TO 3:PRINT "alaarrrmmm!!":CLS:BEEP 1,250,100:NEXT I
10 RESTORE 1000:BEEP 1:CLEAR:DIM A$(2)*26:A$(2)="       action !!":A$(1)="        manip !!"
15 TIME=0:T=1:H=16
20 READ A$(0):IF A$(0)="e" LET T=T+1:PRINT "votre temps:";TIME:GOTO 800
21 IF A$(0)="k" PRINT "votre temps":PRINT TIME:PRINT "bravo, vous avez russi,":GOTO 700
22 IF LEN A$(0)<>1 PRINT A$(0):GOTO 20
23 IF A$(0)="f" LET H=16:GOTO 20
24 IF A$(0)="u" LET H=5:GOTO 20
25 IF A$(0)="h" LET H=8:GOTO 20
26 K=(A$(0)="p" PR A$(0)="M")+1
27 IF INKEY$<>"" FOR I=1 TO 5:I=5:GOTO 40
30 WAIT 0:PRINT A$(K):WAIT 50:BEEP 1,0,5
35 FOR I=1 TO H:IF INKEY$=A$(0) THEN 45
40 NEXT I:CLS:BEEP 2:BEEP 1,255,60:PRINT "aargh !!":PRINT "pauvre cliff !!":GOTO 500
45 BEEP 1,240,20:GOTO 20
500 WAIT 100:PRINT "temps :";TIME:IF TIME>.0204 PRINT ":bien!"
501 IF A$(0)="m" PRINT "vous auriez du faire main":GOTO 500
502 IF A$(0)="p" PRINT "vous auriez du faire pied":GOTO 508
503 IF A$(0)="g" PRINT "vous auriez du faire ->":GOTO 508
504 IF A$(0)="r" PRINT "vous auriez du faire haut":GOTO 508
505 IF A$(0)="s" PRINT "vous auriez du faire <-":GOTO 508
506 IF A$(0)="c" PRINT "vous auriez du faire bas"
508 WAIT 0:PRINT "partie finie :encore? ":IF INKEY$="" GOTO 508
510 IF INKEY$="o" GOTO 1
515 END
700 PRINT "ma fille vous en remercie,":PRINT "mais vous devriez essayer":PRINT "de battre"
705 PRINT "votre temps":GOTO 508
800 WAIT 0:PRINT T;"me tableau:bien!":WAIT 50
805 BEEP 1,150,184:BEEP 1,180,99:BEEP 1,135,35:BEEP 1,98,173:BEEP 1,080,181:BEEP 1,140,60
807 BEEP 1,165,80
810 BEEP 1,180,194:BEEP 1,162,100:BEEP 1,143,196:GOTO 20
905 BEEP 1,150,184:BEEP 1,180,99:BEEP 1,135,35:BEEP 1,85,150:BEEP 1,065,165:BEEP 1,140,60
907 BEEP 1,165,80
910 BEEP 1,180,184:BEEP 1,162,100:BEEP 1,143,196
1000 DATA " cliff hanger !!!"," attrapez-le !!!","p","sautes ","p"
1005 DATA "sautes","p","vite,la voiture,","ouvres-la","m","dmarres,tiite !!!","p"
1010 DATA "faufiles-toi","entre les voitures !","s","g","il faut lacher l'argent"
1015 DATA "m","oh non, ces millions...","e","pshhhh...","on les a enfin lachs!"
1020 DATA "arrtes toi 5 minutes","p","cui cui cui","vroumm !","cette jolie fille"
1025 DATA "conduit bien vite !","vroumm !","mais elle est poursuivie !"
1030 DATA "il faut la rattraper...","et la dfendre !","partons !","p"
1035 DATA "mais dmarres !","m","p","ils ont vers de l'huile"," droite !!","s"
1040 DATA "et  gauche !","g","c'est bon,on les rattrape"
1045 DATA "y a une grenade  gauche!!","g","attention,une autre","s","encore une!"
1050 DATA "g","montes dans la fort !","g","acclre,","p","fais gaffe,la"
1055 DATA "crevasse  gauche!","g","le raviinnn !!!","g","redescends sur la roue"
1060 DATA "c","reste pas  gauche,le buus","g","c","vas  droite de la fille","g"
1065 DATA "p","grimpes sur le toit","p","r","monte dans sa voiture","m","p","ouhh,"
1070 DATA "mes pieds glissent","p","c","stoop,c'est un cul-de-sac!","p","baaoum!"
1075 DATA "bing !","badaboum !"," # @ !!","aaaaaaaahh !","lance la corde,cliff !"
1080 DATA "m","e","il faut que j'ouvre...","ma boucle de ceinture"
1085 DATA "et que je tourne","la manivelle","m","m","ne me suis pas,cliff,"
1090 DATA "tu auras des ennuis...","je dois m'enfuir","adieu..."," hey!...?!"
1095 DATA "oh cliff,cliff,  l'aide!","(quelques temps plus tard,","un hlicoptre"
1100 DATA "nous attaque  la terrasse","d'un caf)","partons !","s",p"
1105 DATA "prends la 1re  gauche"," gauche"," droite","et  gauche","s","s"
1110 DATA "g","s","c'est bon,on est chach","arrtes toi...","p","...je l'entends!!"
1115 DATA "il nous attends au bout","fais marche arrire !!","m","g","c","et fait"
1120 DATA "le chemin inverse","s","g","s","s","maintenant,monte"
1125 DATA "sur le terre-plein","r","va dans l'entre d'gout","en bas","c","s","c"
1130 DATA "g","r","arrtes !!","p","on l'a eu ?!","yahouu !","  flopflopflop"
1135 DATA "aaaaahh...","p","il nous tire dessus !","s","g","s","g","s","g","s","g"
1140 DATA "s","g","tires lui dessus !","m","c'est bon,il explose","g","baaouumm!!"
1145 DATA "e","entre dans la salle et mets","toi  gauche de la porte","s","h"
1150 DATA "ils nous attendent...","de l'autre ct...?","kling!!!","m","m","g","g"
1155 DATA "g","g","m","ouf! un de moins!","slam!!","oh non!","m","g","m","m","m"
1160 DATA "m","m","m","g","g","m","attention derrire toi!!","r","m","g","m","m"
1165 DATA "m","m","allumes l'explosif!","m","baaoummm !!!","sortons par le plafond"
1170 DATA "r","e","vite,les toits","p","p","p","aah!!","m","p","p","sautes dans la"
1175 DATA "voiture","p","p","hiiiii !!!","il y en a un sur le toit"," gauche !!"
1180 DATA "g","il est encore l","g","ca y est !!","regardes,le pont se lve"
1185 DATA "ils nous attendent derrire","p","r","vrraouummm !!!","bong !","e","f"
1190 DATA "elle est srement","prisonnire dans cette","tour au milieu du lac;"
1200 DATA "le seul moyen d'y accder","est de passer","par la canalisation d'eau"
1205 DATA " l'entre du pont,","et de remonter jusque la","1re tour,d'y lancer"
1210 DATA "une corde sur la 2me","tour et d'y aller...","sinon dieu seul sait"
1215 DATA "ce qui lui arrivera...","...flotch,chplic!","enlve la grille","m"
1220 DATA "il faut nager jusqu'","la cavit l-bas","p","aprs la chute,il faut"
1225 DATA "aller au bout","mets ton embout et plonge","m","c","r","attention ne te"
1230 DATA "laisse pas entrainer","p","hmff,hmff,pffouuu...","j'y arrives plus..."
1235 DATA "contournel'engrenage","g","c","s","il faut que je l'attrape!"
1240 DATA "et que je monte","m","r","e","h","il faut grimper l-bas?","eh oui!!"
1245 DATA "ben,j'espre que","le joueur est bon,sinon...","allez!!","hmff,pffohh"
1250 DATA "i i aooohh!!","m","p","montes c'est sur la gauche","p","m","s","je sens"
1255 DATA "que je vais tombeeerr..","m","p","r","houou..","p","s","s","il faut"
1260 DATA "grimper sur la plus haute","tour","p","r","m","r","je prpare le filin"
1265 DATA "tonc!...","zut,je l'ai fait tomber","tu le prends?","m","attends,"
1270 DATA "je descends un peu!","c","m","je...je glisse!!","aaaaaaahhh!!!","p"
1275 DATA "doing","p","p","spetch!!","ouf!il faut que je prenne","le crochet"
1280 DATA "et que je le lance","pour monter","m","m","h","m","h","e","u"
1285 DATA "elle est l,en bas !!","c","oh cliff!!","vote,montes!!","m","m","eh!!"
1290 DATA "la prisonnire s'vade","c","tatataaa !!!","aah!!","mon dieu cliff.."
1295 DATA "e","(vous vous rveillez,","un homme se tient devant","vous qui porte"
1300 DATA "un masque et va vous","frapper  l'aide d'une","pe, une semblable "
1310 DATA "celle que vous portez","m","m","m","m","m","vous bondissez sur un"
1315 DATA "engrenage  ct de celui","sur lequel il a saut","p","p","p","p","m"
1320 DATA "booong !!","p","p","p","p","m","boong !!","p","p","p","p","m","iaaaah !"
1325 DATA "ouyouyouille !.!.!","m","vous l'avez chapp de peu","il est mont sur"
1330 DATA "un mur qui surplombe","le lac avec la fille","et semble tre devenu"
1335 DATA "fou !!!","m","p","r","m","p","r","m","p","r","m","p","r","pffouuu..."
1340 DATA "il vous tire dessus !!","s","m","m","m","iih!","m","hmfff!!","aaaaahh!!"
1350 DATA "il est mort!","oh,cliff,merci","merci pour tout","smmac!!","k"